home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Columbia Kermit
/
kermit.zip
/
newsgroups
/
misc.19971216-19980424
/
000292_news@newsmaster….columbia.edu _Thu Mar 12 17:29:25 1998.msg
< prev
next >
Wrap
Internet Message Format
|
2020-01-01
|
2KB
Return-Path: <news@newsmaster.cc.columbia.edu>
Received: from newsmaster.cc.columbia.edu (newsmaster.cc.columbia.edu [128.59.35.30])
by watsun.cc.columbia.edu (8.8.5/8.8.5) with ESMTP id RAA17829
for <kermit.misc@watsun.cc.columbia.edu>; Thu, 12 Mar 1998 17:29:25 -0500 (EST)
Received: (from news@localhost)
by newsmaster.cc.columbia.edu (8.8.5/8.8.5) id RAA11399
for kermit.misc@watsun; Thu, 12 Mar 1998 17:29:25 -0500 (EST)
Path: news.columbia.edu!panix!nntprelay.mathworks.com!newsfeed.internetmci.com!207.69.200.121!news.mindspring.com!not-for-mail
From: jabr@mindspring.com (John Brnich)
Newsgroups: comp.protocols.kermit.misc
Subject: kermit for sco xenix
Date: Thu, 12 Mar 1998 22:29:59 GMT
Organization: MindSpring Enterprises, Inc.
Lines: 37
Message-ID: <6e9nig$npb$1@camel29.mindspring.com>
Reply-To: jabr@mindspring.com
NNTP-Posting-Host: user-38lcci3.dialup.mindspring.com
X-Server-Date: 12 Mar 1998 22:28:32 GMT
X-Newsreader: Forte Free Agent 1.0.82
Xref: news.columbia.edu comp.protocols.kermit.misc:8487
The following code crashes b4 the enter file name line with the
message "line too long or contains nul characters". I can't find any
unwanted characters using "vi". The set commands are accepted and it
does ask for user name and password. What is wrong? I would
appreciate your input. John.
:begin
set modem type multitech
set line /dev/tty1a
set speed 9600
;set autodownload on
echo \13
:getname
ask \%n Enter your User Name:
ask \%p Hello, \%n, Enter your Password:
:filename ;set var a=1 user inputs file name
cd /absclaims ;q=quit program x=no file to send
def {\%a} {1} ;valid file sets var a to filename
while equal {\%a} {1} { ;which ends the loop
ask \%f Enter File Name (x=no file q=quit):
if equal {\%f} {q} goto theend
xif equal {\%f} {x} {
asg \%a \%f
} else {
xif not exist \%f {
echo File does not exist Enter a valid file name
pause 3
echo \13
} else {
asg \%a \%f }
}
}